object Form1: TForm1 Left = 161 Top = 96 Width = 640 Height = 480 Caption = 'ShapeButton-Demo' Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter TextHeight = 16 object Image1: TImage Left = 0 Top = 0 Width = 632 Height = 452 Picture.Data = {} end object Label2: TLabel Left = 20 Top = 28 Width = 182 Height = 34 Caption = 'ShapeButton' Font.Color = clBlack Font.Height = -29 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label1: TLabel Left = 16 Top = 24 Width = 182 Height = 34 Caption = 'ShapeButton' Font.Color = clYellow Font.Height = -29 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label3: TLabel Left = 16 Top = 64 Width = 92 Height = 14 Caption = '� 1996 M.Filkorn ' Font.Color = clYellow Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object ShapeButton1: TShapeButton Left = 448 Top = 88 Width = 110 Height = 40 Picture.Data = {}